home *** CD-ROM | disk | FTP | other *** search
/ United Public Domain Gold 2 / United Public Domain Gold 2.iso / education / pe022.dms / pe022.adf / GRAVSIM / GRAVSIM.H < prev    next >
Text File  |  1991-07-12  |  11KB  |  651 lines
  1.  
  2. static struct NewScreen NewScreenStructure = {
  3.        0,0,
  4.        640,400,
  5.        2,
  6.        0,1,
  7.        LACE+SPRITES+HIRES,
  8.        CUSTOMSCREEN,
  9.        NULL,
  10.        (UBYTE *)" THE GRAVITY SIMULATOR V1.50             By Richard Frost. © 1988, 1989",
  11.        NULL,
  12.        NULL
  13. };
  14.  
  15. #define NEWSCREENSTRUCTURE NewScreenStructure
  16.  
  17. static USHORT Palette[] = {
  18.        0x0000,
  19.        0x0B40,
  20.        0x0008,
  21.        0x05AF
  22. #define PaletteColorCount 4
  23. };
  24.  
  25. #define PALETTE Palette
  26.  
  27. static UBYTE UNDOBUFFER[30];
  28.  
  29. static struct IntuiText IText1 = {
  30.        3,1,JAM1,
  31.        19,0,
  32.        NULL,
  33.        (UBYTE *)"Slow",
  34.        NULL
  35. };
  36.  
  37. static struct MenuItem SubItem3 = {
  38.        NULL,
  39.        113,8,
  40.        75,8,
  41.        CHECKIT+ITEMTEXT+ITEMENABLED+HIGHCOMP,
  42.        3,
  43.        (APTR)&IText1,
  44.        NULL,
  45.        NULL,
  46.        NULL,
  47.        MENUNULL
  48. };
  49.  
  50. static struct IntuiText IText2 = {
  51.        2,1,JAM2,
  52.        19,0,
  53.        NULL,
  54.        (UBYTE *)"Medium ",
  55.        NULL
  56. };
  57.  
  58. static struct MenuItem SubItem2 = {
  59.        &SubItem3,
  60.        113,0,
  61.        75,8,
  62.        CHECKIT+ITEMTEXT+ITEMENABLED+HIGHCOMP,
  63.        5,
  64.        (APTR)&IText2,
  65.        NULL,
  66.        NULL,
  67.        NULL,
  68.        MENUNULL
  69. };
  70.  
  71. static struct IntuiText IText3 = {
  72.        0,1,JAM2,
  73.        19,0,
  74.        NULL,
  75.        (UBYTE *)"Fast",
  76.        NULL
  77. };
  78.  
  79. static struct MenuItem SubItem1 = {
  80.        &SubItem2,
  81.        113,-8,
  82.        75,8,
  83.        CHECKIT+ITEMTEXT+ITEMENABLED+HIGHCOMP+CHECKED,
  84.        6,
  85.        (APTR)&IText3,
  86.        NULL,
  87.        NULL,
  88.        NULL,
  89.        MENUNULL
  90. };
  91.  
  92. static struct IntuiText IText4 = {
  93.        3,1,COMPLEMENT,
  94.        0,0,
  95.        NULL,
  96.        (UBYTE *)"Playback Speed »",
  97.        NULL
  98. };
  99.  
  100. static struct MenuItem MenuItem4 = {
  101.        NULL,
  102.        0,27,
  103.        128,8,
  104.        ITEMTEXT+ITEMENABLED+HIGHCOMP,
  105.        0,
  106.        (APTR)&IText4,
  107.        NULL,
  108.        NULL,
  109.        &SubItem1,
  110.        MENUNULL
  111. };
  112.  
  113. static struct TextAttr TOPAZ60 = {
  114.        (STRPTR)"topaz.font",
  115.        TOPAZ_SIXTY,0,0
  116. };
  117. static struct IntuiText IText5 = {
  118.        3,1,COMPLEMENT,
  119.        0,0,
  120.        &TOPAZ60,
  121.        (UBYTE *)"PLAYBACK",
  122.        NULL
  123. };
  124.  
  125. static struct MenuItem MenuItem3 = {
  126.        &MenuItem4,
  127.        0,18,
  128.        128,8,
  129.        ITEMTEXT+COMMSEQ+ITEMENABLED+HIGHCOMP,
  130.        0,
  131.        (APTR)&IText5,
  132.        NULL,
  133.        'P',
  134.        NULL,
  135.        MENUNULL
  136. };
  137.  
  138. static struct IntuiText IText6 = {
  139.        3,1,COMPLEMENT,
  140.        19,0,
  141.        &TOPAZ60,
  142.        (UBYTE *)"OFF",
  143.        NULL
  144. };
  145.  
  146. static struct MenuItem MenuItem2 = {
  147.        &MenuItem3,
  148.        0,9,
  149.        128,8,
  150.        CHECKIT+ITEMTEXT+COMMSEQ+ITEMENABLED+HIGHCOMP+CHECKED,
  151.        1,
  152.        (APTR)&IText6,
  153.        NULL,
  154.        'O',
  155.        NULL,
  156.        MENUNULL
  157. };
  158.  
  159. static struct IntuiText IText7 = {
  160.        3,1,COMPLEMENT,
  161.        19,0,
  162.        &TOPAZ60,
  163.        (UBYTE *)"RECORD",
  164.        NULL
  165. };
  166.  
  167. static struct MenuItem MenuItem1 = {
  168.        &MenuItem2,
  169.        0,0,
  170.        128,8,
  171.        CHECKIT+ITEMTEXT+COMMSEQ+ITEMENABLED+HIGHCOMP,
  172.        2,
  173.        (APTR)&IText7,
  174.        NULL,
  175.        'R',
  176.        NULL,
  177.        MENUNULL
  178. };
  179.  
  180. static struct Menu Menu4 = {
  181.        NULL,
  182.        264,0,
  183.        84,0,
  184.        MENUENABLED,
  185.        "Recorder",
  186.        &MenuItem1
  187. };
  188.  
  189. static struct IntuiText IText8 = {
  190.        2,0,JAM1,
  191.        0,0,
  192.        NULL,
  193.        (UBYTE *)"Re-Start",
  194.        NULL
  195. };
  196.  
  197. static struct MenuItem MenuItem7 = {
  198.        NULL,
  199.        0,18,
  200.        104,8,
  201.        ITEMTEXT+COMMSEQ+ITEMENABLED+HIGHCOMP,
  202.        0,
  203.        (APTR)&IText8,
  204.        NULL,
  205.        'N',
  206.        NULL,
  207.        MENUNULL
  208. };
  209.  
  210. static struct IntuiText IText9 = {
  211.        2,0,JAM1,
  212.        0,0,
  213.        NULL,
  214.        (UBYTE *)"STOP",
  215.        NULL
  216. };
  217.  
  218. static struct MenuItem MenuItem6 = {
  219.        &MenuItem7,
  220.        0,9,
  221.        104,8,
  222.        ITEMTEXT+COMMSEQ+ITEMENABLED+HIGHCOMP,
  223.        0,
  224.        (APTR)&IText9,
  225.        NULL,
  226.        'K',
  227.        NULL,
  228.        MENUNULL
  229. };
  230.  
  231. static struct IntuiText IText10 = {
  232.        2,0,JAM1,
  233.        0,0,
  234.        NULL,
  235.        (UBYTE *)"GO!   ",
  236.        NULL
  237. };
  238.  
  239. static struct MenuItem MenuItem5 = {
  240.        &MenuItem6,
  241.        0,0,
  242.        104,8,
  243.        ITEMTEXT+COMMSEQ+ITEMENABLED+HIGHCOMP,
  244.        0,
  245.        (APTR)&IText10,
  246.        NULL,
  247.        'G',
  248.        NULL,
  249.        MENUNULL
  250. };
  251.  
  252. static struct Menu Menu3 = {
  253.        &Menu4,
  254.        164,0,
  255.        93,0,
  256.        MENUENABLED,
  257.        "Animation",
  258.        &MenuItem5
  259. };
  260.  
  261. static struct IntuiText IText11 = {
  262.        3,1,COMPLEMENT,
  263.        19,0,
  264.        NULL,
  265.        (UBYTE *)"Non Coloured",
  266.        NULL
  267. };
  268.  
  269. static struct MenuItem SubItem7 = {
  270.        NULL,
  271.        129,16,
  272.        115,8,
  273.        CHECKIT+ITEMTEXT+ITEMENABLED+HIGHCOMP,
  274.        4,
  275.        (APTR)&IText11,
  276.        NULL,
  277.        NULL,
  278.        NULL,
  279.        MENUNULL
  280. };
  281.  
  282. static struct IntuiText IText12 = {
  283.        3,1,COMPLEMENT,
  284.        19,0,
  285.        NULL,
  286.        (UBYTE *)"Coloured",
  287.        NULL
  288. };
  289.  
  290. static struct MenuItem SubItem6 = {
  291.        &SubItem7,
  292.        129,8,
  293.        115,8,
  294.        CHECKIT+ITEMTEXT+ITEMENABLED+HIGHCOMP+CHECKED,
  295.        8,
  296.        (APTR)&IText12,
  297.        NULL,
  298.        NULL,
  299.        NULL,
  300.        MENUNULL
  301. };
  302.  
  303. static struct IntuiText IText13 = {
  304.        3,1,COMPLEMENT,
  305.        19,0,
  306.        NULL,
  307.        (UBYTE *)"Off",
  308.        NULL
  309. };
  310.  
  311. static struct MenuItem SubItem5 = {
  312.        &SubItem6,
  313.        129,0,
  314.        115,8,
  315.        CHECKIT+ITEMTEXT+ITEMENABLED+HIGHCOMP,
  316.        1,
  317.        (APTR)&IText13,
  318.        NULL,
  319.        NULL,
  320.        NULL,
  321.        MENUNULL
  322. };
  323.  
  324. static struct IntuiText IText14 = {
  325.        3,1,COMPLEMENT,
  326.        19,0,
  327.        NULL,
  328.        (UBYTE *)"On",
  329.        NULL
  330. };
  331.  
  332. static struct MenuItem SubItem4 = {
  333.        &SubItem5,
  334.        129,-8,
  335.        115,8,
  336.        CHECKIT+ITEMTEXT+ITEMENABLED+HIGHCOMP+CHECKED,
  337.        2,
  338.        (APTR)&IText14,
  339.        NULL,
  340.        NULL,
  341.        NULL,
  342.        MENUNULL
  343. };
  344.  
  345. static struct IntuiText IText15 = {
  346.        2,1,COMPLEMENT,
  347.        0,0,
  348.        NULL,
  349.        (UBYTE *)"Paths       »",
  350.        NULL
  351. };
  352.  
  353. static struct MenuItem MenuItem12 = {
  354.        NULL,
  355.        0,36,
  356.        144,8,
  357.        ITEMTEXT+ITEMENABLED+HIGHCOMP,
  358.        0,
  359.        (APTR)&IText15,
  360.        NULL,
  361.        NULL,
  362.        &SubItem4,
  363.        MENUNULL
  364. };
  365.  
  366. static struct IntuiText IText16 = {
  367.        2,1,COMPLEMENT,
  368.        0,0,
  369.        NULL,
  370.        (UBYTE *)"Set Mass",
  371.        NULL
  372. };
  373.  
  374. static struct MenuItem MenuItem11 = {
  375.        &MenuItem12,
  376.        0,27,
  377.        144,8,
  378.        ITEMTEXT+COMMSEQ+ITEMENABLED+HIGHCOMP,
  379.        0,
  380.        (APTR)&IText16,
  381.        NULL,
  382.        'M',
  383.        NULL,
  384.        MENUNULL
  385. };
  386.  
  387. static struct IntuiText IText17 = {
  388.        2,1,COMPLEMENT,
  389.        0,0,
  390.        NULL,
  391.        (UBYTE *)"Set Velocity",
  392.        NULL
  393. };
  394.  
  395. static struct MenuItem MenuItem10 = {
  396.        &MenuItem11,
  397.        0,18,
  398.        144,8,
  399.        ITEMTEXT+COMMSEQ+ITEMENABLED+HIGHCOMP,
  400.        0,
  401.        (APTR)&IText17,
  402.        NULL,
  403.        'V',
  404.        NULL,
  405.        MENUNULL
  406. };
  407.  
  408. static struct IntuiText IText18 = {
  409.        2,1,COMPLEMENT,
  410.        0,0,
  411.        NULL,
  412.        (UBYTE *)"Delete Planet",
  413.        NULL
  414. };
  415.  
  416. static struct MenuItem MenuItem9 = {
  417.        &MenuItem10,
  418.        0,9,
  419.        144,8,
  420.        ITEMTEXT+COMMSEQ+ITEMENABLED+HIGHCOMP,
  421.        0,
  422.        (APTR)&IText18,
  423.        NULL,
  424.        'D',
  425.        NULL,
  426.        MENUNULL
  427. };
  428.  
  429. static struct IntuiText IText19 = {
  430.        2,1,COMPLEMENT,
  431.        0,0,
  432.        NULL,
  433.        (UBYTE *)"Add Planet",
  434.        NULL
  435. };
  436.  
  437. static struct MenuItem MenuItem8 = {
  438.        &MenuItem9,
  439.        0,0,
  440.        144,8,
  441.        ITEMTEXT+COMMSEQ+ITEMENABLED+HIGHCOMP,
  442.        0,
  443.        (APTR)&IText19,
  444.        NULL,
  445.        'A',
  446.        NULL,
  447.        MENUNULL
  448. };
  449.  
  450. static struct Menu Menu2 = {
  451.        &Menu3,
  452.        82,0,
  453.        75,0,
  454.        MENUENABLED,
  455.        "Planets",
  456.        &MenuItem8
  457. };
  458.  
  459. static struct IntuiText IText20 = {
  460.        3,2,JAM2,
  461.        0,0,
  462.        &TOPAZ60,
  463.        (UBYTE *)"Quit",
  464.        NULL
  465. };
  466.  
  467. static struct MenuItem MenuItem16 = {
  468.        NULL,
  469.        0,40,
  470.        80,8,
  471.        ITEMTEXT+COMMSEQ+ITEMENABLED+HIGHBOX,
  472.        0,
  473.        (APTR)&IText20,
  474.        NULL,
  475.        'Q',
  476.        NULL,
  477.        MENUNULL
  478. };
  479.  
  480. static struct IntuiText IText21 = {
  481.        1,2,COMPLEMENT,
  482.        0,0,
  483.        &TOPAZ60,
  484.        (UBYTE *)"Save",
  485.        NULL
  486. };
  487.  
  488. static struct MenuItem MenuItem15 = {
  489.        &MenuItem16,
  490.        0,23,
  491.        80,8,
  492.        ITEMTEXT+COMMSEQ+ITEMENABLED+HIGHCOMP,
  493.        0,
  494.        (APTR)&IText21,
  495.        NULL,
  496.        'S',
  497.        NULL,
  498.        MENUNULL
  499. };
  500.  
  501. static struct IntuiText IText22 = {
  502.        1,2,COMPLEMENT,
  503.        0,0,
  504.        &TOPAZ60,
  505.        (UBYTE *)"Load",
  506.        NULL
  507. };
  508.  
  509. static struct MenuItem MenuItem14 = {
  510.        &MenuItem15,
  511.        0,14,
  512.        80,8,
  513.        ITEMTEXT+COMMSEQ+ITEMENABLED+HIGHCOMP,
  514.        0,
  515.        (APTR)&IText22,
  516.        NULL,
  517.        'L',
  518.        NULL,
  519.        MENUNULL
  520. };
  521.  
  522. static struct IntuiText IText23 = {
  523.        2,1,COMPLEMENT,
  524.        0,0,
  525.        &TOPAZ60,
  526.        (UBYTE *)"New",
  527.        NULL
  528. };
  529.  
  530. static struct MenuItem MenuItem13 = {
  531.        &MenuItem14,
  532.        0,0,
  533.        80,8,
  534.        ITEMTEXT+COMMSEQ+ITEMENABLED+HIGHCOMP,
  535.        0,
  536.        (APTR)&IText23,
  537.        NULL,
  538.        'X',
  539.        NULL,
  540.        MENUNULL
  541. };
  542.  
  543. static struct Menu Menu1 = {
  544.        &Menu2,
  545.        0,0,
  546.        75,0,
  547.        MENUENABLED,
  548.        "Project",
  549.        &MenuItem13
  550. };
  551.  
  552. #define MenuList1 Menu1
  553.  
  554. static struct NewWindow NewWindowStructure1 = {
  555.        0,0,
  556.        640,200,
  557.        0,1,
  558.        MOUSEBUTTONS+MOUSEMOVE+MENUPICK+REQCLEAR+ACTIVEWINDOW+VANILLAKEY,
  559.        BACKDROP+REPORTMOUSE+BORDERLESS+ACTIVATE,
  560.        NULL,
  561.        NULL,
  562.        NULL,
  563.        NULL,
  564.        NULL,
  565.        5,5,
  566.        640,512,
  567.        CUSTOMSCREEN
  568. };
  569.  
  570. static UBYTE StringGadSIBuff[30];
  571. static struct StringInfo StringGadSInfo = {
  572.        StringGadSIBuff,
  573.        UNDOBUFFER,
  574.        0,
  575.        30,
  576.        0,
  577.        0,0,0,0,0,
  578.        0,
  579.        0,
  580.        NULL
  581. };
  582.  
  583. static SHORT BorderVectors1[] = {
  584.        0,0,
  585.        211,0,
  586.        211,10,
  587.        0,10,
  588.        0,0
  589. };
  590. static struct Border Border1 = {
  591.        -2,-1,
  592.        3,0,JAM1,
  593.        5,
  594.        BorderVectors1,
  595.        NULL
  596. };
  597.  
  598. static struct Gadget StringGad = {
  599.        NULL,
  600.        26,33,
  601.        208,9,
  602.        SELECTED,
  603.        RELVERIFY+ENDGADGET+STRINGCENTER,
  604.        STRGADGET+REQGADGET,
  605.        (APTR)&Border1,
  606.        NULL,
  607.        NULL,
  608.        NULL,
  609.        (APTR)&StringGadSInfo,
  610.        StrGad,
  611.        NULL
  612. };
  613.  
  614. #define GadgetList2 StringGad
  615.  
  616. static struct IntuiText IText25 = {
  617.        3,2,JAM2,
  618.        64,18,
  619.        NULL,
  620.        (UBYTE *)"name of the file:",
  621.        NULL
  622. };
  623.  
  624. static struct IntuiText IText24 = {
  625.        3,2,JAM2,
  626.        85,5,
  627.        NULL,
  628.        (UBYTE *)"Type in the",
  629.        &IText25
  630. };
  631.  
  632. #define IntuiTextList2 IText24
  633.  
  634. static struct Requester RequesterStructure2 = {
  635.        NULL,
  636.        194,148,
  637.        261,52,
  638.        0,0,
  639.        &GadgetList2,
  640.        NULL,
  641.        &IntuiTextList2,
  642.        NULL,
  643.        2,
  644.        NULL,
  645.        NULL,
  646.        NULL
  647. };
  648.  
  649.  
  650. /* end of PowerWindows source generation */
  651.